5 A=279:H=5:K=2
10 FOR I=1TO20:HGR2:HCOLOR=H:FORY=1TO190:HPLOT1,YTO279,Y:NEXTY:X1=1:X2=279:HCOLOR=K:FORT=1TOA/I:HPLOT1,190TOX1,1:HPLOT279,190TOX2,1:X1=X1+I:X2=X2-I:NEXT,I